home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / lookupex.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  1.1 KB  |  31 lines
  1. //----------------------------------------------------------------------------
  2. //Borland C++Builder
  3. //Copyright (c) 1987, 1998 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //---------------------------------------------------------------------------
  6. #include <vcl.h>
  7. #pragma hdrstop
  8. //---------------------------------------------------------------------------
  9. USEFILE("readme.txt");
  10. USEFORM("lookup.cpp", fmLookup);
  11. USERES("lookupex.res");
  12. USEFORM("About.cpp", fmAbout);
  13. USEDATAMODULE("maindata.cpp", DMMain);
  14. //---------------------------------------------------------------------
  15. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  16. {
  17.    try
  18.    {
  19.         Application->Initialize();
  20.         Application->CreateForm(__classid(TfmLookup), &fmLookup);
  21.         Application->CreateForm(__classid(TDMMain), &DMMain);
  22.         Application->Run();
  23.    }
  24.    catch (Exception &exception)
  25.    {
  26.         Application->ShowException(&exception);
  27.    }
  28.         return 0;
  29. }
  30. //---------------------------------------------------------------------------
  31.